home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / Apple II / Apple II Sample Code / MPW IIGS SC / SC.015.CDev.Samples / Pascal / CDevIntF.p < prev    next >
Encoding:
Text File  |  1990-06-24  |  1.8 KB  |  46 lines  |  [TEXT/MPS ]

  1. { Max Pascal interface to the CDEV Manager by Darryl Lovato
  2.   Copyright (c) 1989-1990 by Apple Computer, Inc. }
  3.  
  4. unit CDEVIntF;
  5.  
  6. interface
  7.  
  8. const
  9.     MachineCDEV =        1;    { machine test, return 0 if NOT ok to run on this machine }
  10.     BootCDEV =            2;    { boot time init call or Install call - no parms }
  11.     ShutDownCDEV =        3;    { shut down or de-install the CDEV - no parms }
  12.     InitCDEV =            4;    { called when being shown - data1 = windowPtr }
  13.     CloseCDEV =            5;    { called when being removed - data1 = windowPtr }
  14.     EventsCDEV =        6;    { call3ed when an event - data1 = ptr to event record }
  15.     CreateCDEV =        7;    { called so that a CDEV can create its controls inline - data1 = window }
  16.     AboutCDEV =            8;    { called so that a CDEV can create its about text inline - no parms }
  17.     RectCDEV =            9;    { called so that a CDEV can dynamically compute its rectangle data1 = rectprr }
  18.     HitCDEV =            10;    { called when ctl is "hit" - data1 = Hdl to ctl hit, data2 = Ctl Id }
  19.     RunCDEV =            11;    { called when daRun is called }
  20.     reserved1 =            12;    { reserved for Apple Computer's future use }
  21.     reserved2 =            13;    { reserved for Apple Computer's future use }
  22.     reserved3 =            14;    { reserved for Apple Computer's future use }
  23.     NeverUsed1 =        15;
  24.     NeverUsed2 =        16;
  25.  
  26.     wantMachine =        1;    { these flags are set in the CDEV flags resource to tell the Control }
  27.     wantBoot =            2;    { panel which of the above messages the CDEV actually needs }
  28.     wantShutDown =        4;
  29.     wantInit =            8;
  30.     wantClose =            16;
  31.     wantEvents =        32;
  32.     wantCreate =        64;
  33.     wantAbout =            128;
  34.     wantRect =            256;
  35.     wantHit =            512;
  36.     wantRun =            1024;
  37.     wantReserved1 =        2048;
  38.     wantReserved2 =        4096;
  39.     wantReserved3 =        8192;
  40.     updateSSfromBRAM =    16384;    { this is for use by Apple Computer, Inc ONLY! <- I mean it! }
  41.     CanBeUnActive =        32768;    { set this bit if the cdev can be made inactive by the user }
  42.  
  43. implementation
  44.  
  45. end.
  46.